home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 7 / rzsz0589.zip / VUPLFILE.T < prev    next >
Text File  |  1988-04-30  |  274b  |  14 lines
  1.     echo "Uploading %item to VMS using DCL create command"
  2.     pat
  3.     if S>2400 pt1; ena -t
  4.     putw "set terminal/hostsync/noecho\r"
  5.     putw "create %item\r"
  6.     sleep 10
  7.     f -xHr %item
  8.     pat 1 "\044"
  9.     put "\032"
  10.     wait -f30
  11.     if !1 echo "create failed!"
  12.     putw "set terminal/echo\r"
  13.     dis -Htx
  14.